home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / DBaldwin / htmllite.exe / htmldemo.exe / 0 / RCDATA / TFORM1 / TFORM1.txt < prev   
Encoding:
Text File  |  2001-06-24  |  5.7 KB  |  257 lines

  1. object Form1: TForm1
  2.   Left = 313
  3.   Top = 163
  4.   Width = 631
  5.   Height = 452
  6.   Font.Color = clWindowText
  7.   Font.Height = -13
  8.   Font.Name = 'System'
  9.   Font.Style = []
  10.   Icon.Data = {<image000.ico>}
  11.   Menu = MainMenu
  12.   Position = poDefaultPosOnly
  13.   OnCreate = FormCreate
  14.   OnDestroy = FormDestroy
  15.   OnShow = FormShow
  16.   PixelsPerInch = 96
  17.   TextHeight = 16
  18.   object Panel1: TPanel
  19.     Left = 0
  20.     Top = 387
  21.     Width = 623
  22.     Height = 19
  23.     Align = alBottom
  24.     Alignment = taLeftJustify
  25.     BevelInner = bvLowered
  26.     BevelOuter = bvNone
  27.     TabOrder = 0
  28.   end
  29.   object Panel2: TPanel
  30.     Left = 0
  31.     Top = 0
  32.     Width = 623
  33.     Height = 33
  34.     Align = alTop
  35.     BevelOuter = bvNone
  36.     TabOrder = 1
  37.     object Edit1: TEdit
  38.       Left = 190
  39.       Top = 4
  40.       Width = 337
  41.       Height = 24
  42.       TabStop = False
  43.       ReadOnly = True
  44.       TabOrder = 3
  45.     end
  46.     object ReloadButton: TButton
  47.       Left = 10
  48.       Top = 4
  49.       Width = 59
  50.       Height = 24
  51.       Caption = '&Reload'
  52.       Enabled = False
  53.       TabOrder = 0
  54.       OnClick = ReloadButtonClick
  55.     end
  56.     object BackButton: TButton
  57.       Left = 69
  58.       Top = 4
  59.       Width = 59
  60.       Height = 24
  61.       Caption = '&Back'
  62.       Enabled = False
  63.       TabOrder = 1
  64.       OnClick = FwdBackClick
  65.     end
  66.     object FwdButton: TButton
  67.       Left = 128
  68.       Top = 4
  69.       Width = 59
  70.       Height = 24
  71.       Caption = '&Forward'
  72.       Enabled = False
  73.       TabOrder = 2
  74.       OnClick = FwdBackClick
  75.     end
  76.   end
  77.   object Panel3: TPanel
  78.     Left = 0
  79.     Top = 33
  80.     Width = 623
  81.     Height = 354
  82.     Align = alClient
  83.     BevelInner = bvLowered
  84.     BevelOuter = bvNone
  85.     Caption = 'Panel3'
  86.     TabOrder = 2
  87.     object Viewer: ThtmlLite
  88.       Left = 1
  89.       Top = 1
  90.       Width = 621
  91.       Height = 352
  92.       Cursor = 2
  93.       OnHotSpotCovered = HotSpotChange
  94.       OnHotSpotClick = HotSpotClick
  95.       OnFormSubmit = SubmitEvent
  96.       OnHistoryChange = HistoryChange
  97.       TabStop = True
  98.       TabOrder = 0
  99.       Align = alClient
  100.       DefBackground = clWhite
  101.       BorderStyle = htFocused
  102.       HistoryMaxCount = 0
  103.       DefFontName = 'Times New Roman'
  104.       DefPreFontName = 'Courier New'
  105.       NoSelect = False
  106.       htOptions = []
  107.       OnMouseMove = ViewerMouseMove
  108.       OnProcessing = ProcessingHandler
  109.       OnInclude = ViewerInclude
  110.       OnSoundRequest = SoundRequest
  111.       OnMetaRefresh = MetaRefreshEvent
  112.       OnObjectClick = ObjectClick
  113.       OnRightClick = RightClick
  114.       object MediaPlayer: TMediaPlayer
  115.         Left = 308
  116.         Top = 40
  117.         Width = 253
  118.         Height = 30
  119.         Visible = False
  120.         TabOrder = 3
  121.         OnNotify = MediaPlayerNotify
  122.       end
  123.     end
  124.   end
  125.   object OpenDialog: TOpenDialog
  126.     DefaultExt = 'htm'
  127.     FileEditStyle = fsEdit
  128.     Filter = 'html files|*.htm;*.html|all files|*.*'
  129.     Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
  130.     Left = 393
  131.     Top = 2
  132.   end
  133.   object MainMenu: TMainMenu
  134.     Left = 355
  135.     Top = 4
  136.     object File1: TMenuItem
  137.       Caption = '&File'
  138.       ShortCut = 0
  139.       object Open: TMenuItem
  140.         Caption = '&Open'
  141.         ShortCut = 114
  142.         OnClick = OpenFileClick
  143.       end
  144.       object OpenTextFile: TMenuItem
  145.         Caption = 'Open &Text File'
  146.         ShortCut = 0
  147.         OnClick = OpenTextFileClick
  148.       end
  149.       object OpenImageFile: TMenuItem
  150.         Caption = 'Open &Image File'
  151.         ShortCut = 0
  152.         OnClick = OpenImageFileClick
  153.       end
  154.       object N1: TMenuItem
  155.         Caption = '-'
  156.         ShortCut = 0
  157.       end
  158.       object Exit1: TMenuItem
  159.         Caption = 'E&xit'
  160.         ShortCut = 0
  161.         OnClick = Exit1Click
  162.       end
  163.     end
  164.     object Edit2: TMenuItem
  165.       Caption = '&Edit'
  166.       ShortCut = 0
  167.       OnClick = Edit2Click
  168.       object Find1: TMenuItem
  169.         Caption = '&Find'
  170.         Enabled = False
  171.         ShortCut = 0
  172.         OnClick = Find1Click
  173.       end
  174.       object CopyItem: TMenuItem
  175.         Caption = '&Copy'
  176.         ShortCut = 16451
  177.         OnClick = CopyItemClick
  178.       end
  179.       object N2: TMenuItem
  180.         Caption = '-'
  181.         ShortCut = 0
  182.       end
  183.       object SelectAllItem: TMenuItem
  184.         Caption = 'Select &All'
  185.         Enabled = False
  186.         ShortCut = 0
  187.         OnClick = SelectAllItemClick
  188.       end
  189.     end
  190.     object options1: TMenuItem
  191.       Caption = '&Options'
  192.       ShortCut = 0
  193.       object ShowImages: TMenuItem
  194.         Caption = '&Show images'
  195.         ShortCut = 0
  196.         OnClick = ShowImagesClick
  197.       end
  198.       object Fonts: TMenuItem
  199.         Caption = 'Default &Font/Colors...'
  200.         ShortCut = 0
  201.         OnClick = FontColorsClick
  202.       end
  203.     end
  204.     object HistoryMenuItem: TMenuItem
  205.       Caption = '&History'
  206.       ShortCut = 0
  207.       Visible = False
  208.     end
  209.     object About1: TMenuItem
  210.       Caption = '&About'
  211.       ShortCut = 0
  212.       OnClick = About1Click
  213.     end
  214.   end
  215.   object FindDialog: TFindDialog
  216.     Options = [frDown, frHideWholeWord, frHideUpDown, frDisableUpDown, frDisableWholeWord]
  217.     OnFind = FindDialogFind
  218.     Left = 313
  219.     Top = 65535
  220.   end
  221.   object PopupMenu: TPopupMenu
  222.     Left = 480
  223.     Top = 1
  224.     object Viewimage: TMenuItem
  225.       Caption = '&View image'
  226.       ShortCut = 0
  227.       OnClick = ViewimageClick
  228.     end
  229.     object CopyImageToClipboard: TMenuItem
  230.       Caption = '&Copy image to clipboard'
  231.       ShortCut = 0
  232.       OnClick = CopyImageToClipboardClick
  233.     end
  234.     object N3: TMenuItem
  235.       Caption = '-'
  236.       ShortCut = 0
  237.     end
  238.     object OpenInNewWindow: TMenuItem
  239.       Caption = '&Open in new window'
  240.       ShortCut = 0
  241.       OnClick = OpenInNewWindowClick
  242.     end
  243.   end
  244.   object MetaTimer: TTimer
  245.     Enabled = False
  246.     OnTimer = MetaTimerTimer
  247.     Left = 242
  248.     Top = 3
  249.   end
  250.   object Timer1: TTimer
  251.     Interval = 200
  252.     OnTimer = Timer1Timer
  253.     Left = 179
  254.     Top = 119
  255.   end
  256. end
  257.